Diffferent available features for Rayshader:
Rayshader has a single function to generate 3D plots using ggplot2 objects:
plot_gg Takes a ggplot2 object (or a list of two ggplot2 objects) and uses the fill or color aesthetic to transform the plot into a 3D surface. You can pass any of the arguments used to specify the camera and the background/shadow colors in plot_3d(), and manipulate the displayed 3D plot using render_camera() and render_depth().
library(ggplot2)
ggdiamonds = ggplot(diamonds) +
stat_density_2d(aes(x = x, y = depth, fill = stat(nlevel)),
geom = "polygon", n = 100, bins = 10, contour = TRUE) +
facet_wrap(clarity~.) +
scale_fill_viridis_c(option = "A")
par(mfrow = c(1, 2))
plot_gg(ggdiamonds, width = 5, height = 5, raytrace = FALSE, preview = TRUE)
plot_gg(ggdiamonds, width = 5, height = 5, multicore = TRUE, scale = 250,
zoom = 0.7, theta = 10, phi = 30, windowsize = c(800, 800))
Sys.sleep(0.2)
render_snapshot(clear = TRUE)

Rayshader also detects when the user passes the color aesthetic, and maps those values to 3D. If both color and fill are passed, however, rayshader will default to fill.
mtplot = ggplot(mtcars) +
geom_point(aes(x = mpg, y = disp, color = cyl)) +
scale_color_continuous(limits = c(0, 8))
par(mfrow = c(1, 2))
plot_gg(mtplot, width = 3.5, raytrace = FALSE, preview = TRUE)
plot_gg(mtplot, width = 3.5, multicore = TRUE, windowsize = c(800, 800),
zoom = 0.85, phi = 35, theta = 30, sunangle = 225, soliddepth = -100)
Sys.sleep(0.2)
render_snapshot(clear = TRUE)

Rayshader has seven functions related to mapping:
ray_shade uses user specified light directions to calculate a global shadow map for an elevation matrix. By default, this also scales the light intensity at each point by the dot product of the mean ray direction and the surface normal (also implemented in function lamb_shade, this can be turned off by setting lambert=FALSE.
sphere_shade maps an RGB texture to a hillshade by spherical mapping. A texture can be generated with the create_texture function, or loaded from an image. sphere_shade also includes 7 built-in palettes: “imhof1”, “imhof2”, “imhof3”, imhof4“,”desert“,”bw“,”unicorn".
create_texture programmatically creates texture maps given five colors: a highlight, a shadow, a left fill light, a right fill light, and a center color for flat areas. The user can also optionally specify the colors at the corners, but create_texture will interpolate those if they aren’t given.
ambient_shade creates an ambient occlusion shadow layer, darkening areas that have less scattered light from the atmosphere. This results in valleys being darker than flat areas and ridges.
lamb_shade uses a single user specified light direction to calculate a local shadow map based on the dot product between the surface normal and the light direction for an elevation matrix. add_shadow takes two of the shadow maps above and combines them, scaling the second one (or, if the second is an RGB array, the matrix) as specified by the user.
add_overlay takes a 3 or 4-layer RGB/RGBA array and overlays it on the current map. If the map includes transparency, this is taken into account when overlaying the image. Otherwise, the user can specify a single color that will be marked as completely transparent, or set the full overlay as partly transparent.
Rayshader also has three functions to detect and add water to maps:
detect_water uses a flood-fill algorithm to detect bodies of water of a user-specified minimum area.
add_water uses the output of detect_water to add a water color to the map. The user can input their own color, or pass the name of one of the pre-defined palettes from sphere_shade to get a matching hue.
render_water adds a 3D tranparent water layer to 3D maps, after the rgl device has already been created. This can either add to a map that does not already have a water layer, or replace an existing water layer on the map.
And four functions to display and save your visualizations:
plot_map Plots the current map. Accepts either a matrix or an array.
write_png Writes the current map to disk with a user-specified filename.
plot_3d Creates a 3D map, given a texture and an elevation matrix. You can customize the appearance of the map, as well as add a user-defined water level.
render_snapshot Saves an image of the current 3D view to disk (if given a filename), or plots the 3D view to the current device (useful for including images in R Markdown files). render_movie Creates and saves a mp4 file of the camera rotating around the 3D scene by either using a built-in orbit or by using one provided by the user.
Plotting map and sphere_shade
library(rayshader)
#Here, I load a map with the raster package.
loadzip = tempfile()
download.file("https://tylermw.com/data/dem_01.tif.zip", loadzip)
localtif = raster::raster(unzip(loadzip, "dem_01.tif"))
## Warning in showSRID(SRS_string, format = "PROJ", multiline = "NO", prefer_proj =
## prefer_proj): Discarded datum unknown in Proj4 definition
unlink(loadzip)
#And convert it to a matrix:
elmat = raster_to_matrix(localtif)
#We use another one of rayshader's built-in textures:
elmat %>%
sphere_shade(texture = "desert") %>%
plot_map()

#sphere_shade can shift the sun direction:
elmat %>%
sphere_shade(sunangle = 45, texture = "desert") %>%
plot_map()

Detecting and Adding Water
#detect_water and add_water adds a water layer to the map:
elmat %>%
sphere_shade(texture = "desert") %>%
add_water(detect_water(elmat), color = "desert") %>%
plot_map()

Adding Shadow
#And we can add a raytraced layer from that sun direction as well:
elmat %>%
sphere_shade(texture = "desert") %>%
add_water(detect_water(elmat), color = "desert") %>%
add_shadow(ray_shade(elmat), 0.5) %>%
plot_map()

Adding Ambient Occlusion Shadow Layer
#And here we add an ambient occlusion shadow layer, which models
#lighting from atmospheric scattering:
elmat %>%
sphere_shade(texture = "desert") %>%
add_water(detect_water(elmat), color = "desert") %>%
add_shadow(ray_shade(elmat), 0.5) %>%
add_shadow(ambient_shade(elmat), 0) %>%
plot_map()

Plotting in 3D
elmat %>%
sphere_shade(texture = "desert") %>%
add_water(detect_water(elmat), color = "desert") %>%
add_shadow(ray_shade(elmat, zscale = 3), 0.5) %>%
add_shadow(ambient_shade(elmat), 0) %>%
plot_3d(elmat, zscale = 10, fov = 0, theta = 135, zoom = 0.75, phi = 45, windowsize = c(1000, 800))
Sys.sleep(0.2)
render_snapshot()

Adding Scale
render_camera(fov = 0, theta = 60, zoom = 0.75, phi = 45)
render_scalebar(limits=c(0, 5, 10),label_unit = "km",position = "W", y=50,
scale_length = c(0.33,1))
render_compass(position = "E")
render_snapshot(clear=TRUE)

The problem set:
Below is our problem set about the Hong Kong housing price. We have given the datasets, the 2d Plots and also some information below.
library(readxl)
library(sp)
library(ggplot2)
library(png)
library(grid)
library(rayshader)
library(rgl)
## Here is the 3 datasets
district_name = read_excel('District Name.xlsx',1)
population = read_excel('Population Data.xlsx',1)
colnames(population) = c("Chi_name", "Population")
hkmap = readRDS("HKG_adm1.rds")
# The [reprocessing part
map_data = data.frame(id=hkmap$ID_1, Code=hkmap$HASC_1, Eng_name=hkmap$NAME_1)
map_data$Code = gsub('HK.', '', as.character(map_data$Code))
map_data = merge(map_data, district_name, by = 'Eng_name')
hkmapdf = fortify(hkmap)
## Regions defined for each Polygons
map_data = merge(hkmapdf, map_data, by="id")
map_data = merge(map_data, population, by = "Chi_name")
map_data$Population = as.numeric(map_data$Population)
# Here is the code to create a 2D map in Hongkong.
# Map
map_bg = ggplot(map_data, aes(long, lat, group=group, fill = Population)) +
geom_polygon() + # Shape
scale_fill_gradient(limits=range(map_data$Population),
low="#FFF3B0", high="#E09F3E") + # Population Density Color
layer(geom="path", stat="identity", position="identity",
mapping=aes(x=long, y=lat, group=group,
color=I('#FFFFFF'))) # Boarder Color
map_bg = map_bg + theme(legend.position = "none",
axis.line=element_blank(),
axis.text.x=element_blank(), axis.title.x=element_blank(),
axis.text.y=element_blank(), axis.title.y=element_blank(),
axis.ticks=element_blank(),
panel.background = element_blank()) # Clean Everything
map_bg

# Save as PNG
xlim = ggplot_build(map_bg)$layout$panel_scales_x[[1]]$range$range
ylim = ggplot_build(map_bg)$layout$panel_scales_y[[1]]$range$range
ggsave('map_bg.png', width = diff(xlim)*40, height = diff(ylim)*40, units = "cm")
# Real Estate Dataset
estate_df = readr::read_csv('https://raw.githubusercontent.com/cydalytics/HK_Properties_Price_Distribution/master/real_estate_master_df.csv')
## Rows: 195 Columns: 6
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (4): Real_Estate_Chi, Price_Per_SqFeet_Apr2020, Price_Per_SqFeet_Mar2020...
## dbl (2): Latitude, Longitude
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
estate_df$apr_price = as.numeric(gsub('[^0-9]', '', estate_df$Price_Per_SqFeet_Apr2020))
estate_df$mar_price = as.numeric(gsub('[^0-9]', '', estate_df$Price_Per_SqFeet_Mar2020))
# Read Background Image
hk_map_bg = readPNG('map_bg.png')
Here is the 2D map that we need to turn into 3D.
# 2D Plot
library(ggplot2)
library(grid)
estate_price = ggplot(estate_df) +
annotation_custom(rasterGrob(hk_map_bg, width=unit(1,"npc"), height=unit(1,"npc")),
-Inf, Inf, -Inf, Inf) + # Background
xlim(xlim[1],xlim[2]) + # x-axis Mapping
ylim(ylim[1],ylim[2]) + # y-axis Mapping
geom_point(aes(x=Longitude, y=Latitude, color=apr_price), size=2) + # Points
scale_colour_gradient(name = 'Price per square foot (real)\n(HKD)',
limits=range(estate_df$apr_price),
low="#FCB9B2", high="#B23A48") + # Price Density Color
theme(axis.line=element_blank(),
axis.text.x=element_blank(), axis.title.x=element_blank(),
axis.text.y=element_blank(), axis.title.y=element_blank(),
axis.ticks=element_blank(),
panel.background = element_blank()) # Clean Everything
estate_price

ggsave('estate_price.png', width = diff(xlim)*40, height = diff(ylim)*40, units = "cm")
After seeing the graph, the two questions for you to explore will be:
How is the population distribution in Hong Kong? Is the estate price higher in densely populated district?
How to transfer a 2D plot to a 3D plot? Do you think creating a 3D plot will be a good idea in here? Why is that?
LS0tCnRpdGxlOiAnUmF5c2hhZGVyIEV4cGxvcmF0aW9uJwphdXRob3I6ICJEdWMgTmdvLCBKaWFzaHUgTGl1LCBLYXNodmkgQWppdHNhcmlhIgpvdXRwdXQ6IAogIGh0bWxfZG9jdW1lbnQ6CiAgICB0b2M6IHRydWUKICAgIHRvY19mbG9hdDogdHJ1ZQogICAgZGZfcHJpbnQ6IHBhZ2VkCiAgICBjb2RlX2Rvd25sb2FkOiB0cnVlCi0tLQoKIyBJbnRyb2R1Y3Rpb246IApXaGF0IGlzIHJheXNoYWRlcj8gV2h5IGlzIHRoaXMgc28gY29vbCBhbmQgZnVuPyBEdXJpbmcgdGhpcyBwcmVzZW50YXRpb24sIHdlIHdpbGwgdGFsayBhYm91dCB0aGUgd2F5IHRvIHVzZSByYXlzaGFkZXIsIHdoeSB3ZSB3YW50IHRvIHVzZSByYXlzaGFkZXIgYW5kIGFsc28gaG93IHRvIGNoYW5nZSBmcm9tIDJEIGdyYXBoaWNzIHRvIDNEIGdyYXBoaWNzIHVzaW5nIHJheXNoYWRlci4gCgojIyBIb3cgdG8gaW5zdGFsbCByYXlzaGFkZXI6CgpGaXJzdCwgaW4gb3JkZXIgdG8gdXNlIHJheXNoYWRlciwgd2UgbmVlZCB0byBpbnN0YWxsIHNvbWUgbGlicmFyeQoKYGBge3J9CiMgaW5zdGFsbC5wYWNrYWdlcygiZGV2dG9vbHMiKQpkZXZ0b29sczo6aW5zdGFsbF9naXRodWIoInR5bGVybW9yZ2Fud2FsbC9yYXlzaGFkZXIiKQpgYGAKCkFmdGVyIHdlIGZpbmlzaGVkIGRvd25sb2FkaW5nIHRoZSByYXlzaGFkZXIsIHdlIGNhbiB0cnkgdG8gc2VlIHdoZXRoZXIgdGhlIGxpYnJhcnkgd29ya3Mgb3Igbm90LiAKYGBge3J9CmxpYnJhcnkocmF5c2hhZGVyKQpgYGAKCklmIHRoZSBsaWJyYXJ5IGRvZXMgbm90IHJ1biwgeW91IHNob3VvbGQgY29uc2lkZXIgZG93bmxvYWRpbmcgWFF1YXJ6OiBodHRwczovL3d3dy54cXVhcnR6Lm9yZy8uIE9uY2UgeW91IGZpbmlzaCBkb3dubG9hZGluZyBYUXVhcnosIGhvcGVmdWxseSwgeW91IGNhbiB1c2UgUmF5c2hhZGVyIGluIHlvdXIgY29tcHV0ZXIhCgojIyBXaHkgZG8gd2Ugd2FudCB0byB1c2UgcmF5c2hhZGVyPwoKLSBTdXBwb3J0aW5nIDJEIGFuZCAzRCBkYXRhIHZpc3VhbGlzYXRpb24KCi0gRGlyZWN0bHkgdHJhbnNmb3JtIHRoZSBnZ3Bsb3QyIG9iamVjdHMgaW50byAzRCBwbG90CgotIEdlbmVyYXRlIGJlYXV0aWZ1bCB0b3BvZ3JhcGhpYyAyRCBhbmQgM0QgbWFwcwoKLSBDcmVhdGUgYSBjaW5lbWF0aWMgZGVwdGggb2YgZmllbGQgcG9zdC1wcm9jZXNzaW5nIGVmZmVjdCB0byBkaXJlY3QgdGhlIHVzZXLigJlzIGZvY3VzIHRvIGltcG9ydGFudCByZWdpb25zIGluIHRoZSBmaWd1cmUKCldpdGggYWxsIG9mIHRoZXNlIGZlYXR1cmVzLCBpdCB3aWxsIGJlIHdvbmRlcmZ1bCB0byBjb25zaWRlciByYXlzaGFkZXIgdG8gY3JlYXRlIGJlYXV0aWZ1bCB2aXN1YWxpemF0aW9uIGZvciB5b3VyIGdyYXBoaWNzIQoKIyBEaWZmZmVyZW50IGF2YWlsYWJsZSBmZWF0dXJlcyBmb3IgUmF5c2hhZGVyOiAKCiMjIFJheXNoYWRlciBoYXMgYSBzaW5nbGUgZnVuY3Rpb24gdG8gZ2VuZXJhdGUgM0QgcGxvdHMgdXNpbmcgZ2dwbG90MiBvYmplY3RzOgoKcGxvdF9nZyBUYWtlcyBhIGdncGxvdDIgb2JqZWN0IChvciBhIGxpc3Qgb2YgdHdvIGdncGxvdDIgb2JqZWN0cykgYW5kIHVzZXMgdGhlIGZpbGwgb3IgY29sb3IgYWVzdGhldGljIHRvIHRyYW5zZm9ybSB0aGUgcGxvdCBpbnRvIGEgM0Qgc3VyZmFjZS4gWW91IGNhbiBwYXNzIGFueSBvZiB0aGUgYXJndW1lbnRzIHVzZWQgdG8gc3BlY2lmeSB0aGUgY2FtZXJhIGFuZCB0aGUgYmFja2dyb3VuZC9zaGFkb3cgY29sb3JzIGluIHBsb3RfM2QoKSwgYW5kIG1hbmlwdWxhdGUgdGhlIGRpc3BsYXllZCAzRCBwbG90IHVzaW5nIHJlbmRlcl9jYW1lcmEoKSBhbmQgcmVuZGVyX2RlcHRoKCkuCgpgYGB7cn0KbGlicmFyeShnZ3Bsb3QyKQpnZ2RpYW1vbmRzID0gZ2dwbG90KGRpYW1vbmRzKSArCiAgc3RhdF9kZW5zaXR5XzJkKGFlcyh4ID0geCwgeSA9IGRlcHRoLCBmaWxsID0gc3RhdChubGV2ZWwpKSwKICAgICAgICAgICAgICAgICAgZ2VvbSA9ICJwb2x5Z29uIiwgbiA9IDEwMCwgYmlucyA9IDEwLCBjb250b3VyID0gVFJVRSkgKwogIGZhY2V0X3dyYXAoY2xhcml0eX4uKSArCiAgc2NhbGVfZmlsbF92aXJpZGlzX2Mob3B0aW9uID0gIkEiKQoKcGFyKG1mcm93ID0gYygxLCAyKSkKCnBsb3RfZ2coZ2dkaWFtb25kcywgd2lkdGggPSA1LCBoZWlnaHQgPSA1LCByYXl0cmFjZSA9IEZBTFNFLCBwcmV2aWV3ID0gVFJVRSkKcGxvdF9nZyhnZ2RpYW1vbmRzLCB3aWR0aCA9IDUsIGhlaWdodCA9IDUsIG11bHRpY29yZSA9IFRSVUUsIHNjYWxlID0gMjUwLAogICAgICAgIHpvb20gPSAwLjcsIHRoZXRhID0gMTAsIHBoaSA9IDMwLCB3aW5kb3dzaXplID0gYyg4MDAsIDgwMCkpClN5cy5zbGVlcCgwLjIpCnJlbmRlcl9zbmFwc2hvdChjbGVhciA9IFRSVUUpCmBgYAoKUmF5c2hhZGVyIGFsc28gZGV0ZWN0cyB3aGVuIHRoZSB1c2VyIHBhc3NlcyB0aGUgY29sb3IgYWVzdGhldGljLCBhbmQgbWFwcyB0aG9zZSB2YWx1ZXMgdG8gM0QuIElmIGJvdGggY29sb3IgYW5kIGZpbGwgYXJlIHBhc3NlZCwgaG93ZXZlciwgcmF5c2hhZGVyIHdpbGwgZGVmYXVsdCB0byBmaWxsLgoKYGBge3J9Cm10cGxvdCA9IGdncGxvdChtdGNhcnMpICsKICBnZW9tX3BvaW50KGFlcyh4ID0gbXBnLCB5ID0gZGlzcCwgY29sb3IgPSBjeWwpKSArCiAgc2NhbGVfY29sb3JfY29udGludW91cyhsaW1pdHMgPSBjKDAsIDgpKQoKcGFyKG1mcm93ID0gYygxLCAyKSkKcGxvdF9nZyhtdHBsb3QsIHdpZHRoID0gMy41LCByYXl0cmFjZSA9IEZBTFNFLCBwcmV2aWV3ID0gVFJVRSkKCnBsb3RfZ2cobXRwbG90LCB3aWR0aCA9IDMuNSwgbXVsdGljb3JlID0gVFJVRSwgd2luZG93c2l6ZSA9IGMoODAwLCA4MDApLAogICAgICAgIHpvb20gPSAwLjg1LCBwaGkgPSAzNSwgdGhldGEgPSAzMCwgc3VuYW5nbGUgPSAyMjUsIHNvbGlkZGVwdGggPSAtMTAwKQpTeXMuc2xlZXAoMC4yKQpyZW5kZXJfc25hcHNob3QoY2xlYXIgPSBUUlVFKQpgYGAKCiMjIFJheXNoYWRlciBoYXMgc2V2ZW4gZnVuY3Rpb25zIHJlbGF0ZWQgdG8gbWFwcGluZzoKCmByYXlfc2hhZGVgIHVzZXMgdXNlciBzcGVjaWZpZWQgbGlnaHQgZGlyZWN0aW9ucyB0byBjYWxjdWxhdGUgYSBnbG9iYWwgc2hhZG93IG1hcCBmb3IgYW4gZWxldmF0aW9uIG1hdHJpeC4gQnkgZGVmYXVsdCwgdGhpcyBhbHNvIHNjYWxlcyB0aGUgbGlnaHQgaW50ZW5zaXR5IGF0IGVhY2ggcG9pbnQgYnkgdGhlIGRvdCBwcm9kdWN0IG9mIHRoZSBtZWFuIHJheSBkaXJlY3Rpb24gYW5kIHRoZSBzdXJmYWNlIG5vcm1hbCAoYWxzbyBpbXBsZW1lbnRlZCBpbiBmdW5jdGlvbiBsYW1iX3NoYWRlLCB0aGlzIGNhbiBiZSB0dXJuZWQgb2ZmIGJ5IHNldHRpbmcgbGFtYmVydD1GQUxTRS4KCmBzcGhlcmVfc2hhZGVgIG1hcHMgYW4gUkdCIHRleHR1cmUgdG8gYSBoaWxsc2hhZGUgYnkgc3BoZXJpY2FsIG1hcHBpbmcuIEEgdGV4dHVyZSBjYW4gYmUgZ2VuZXJhdGVkIHdpdGggdGhlIGNyZWF0ZV90ZXh0dXJlIGZ1bmN0aW9uLCBvciBsb2FkZWQgZnJvbSBhbiBpbWFnZS4gc3BoZXJlX3NoYWRlIGFsc28gaW5jbHVkZXMgNyBidWlsdC1pbiBwYWxldHRlczog4oCcaW1ob2Yx4oCdLCDigJxpbWhvZjLigJ0sIOKAnGltaG9mM+KAnSwgaW1ob2Y04oCcLOKAnWRlc2VydOKAnCzigJ1id+KAnCzigJ11bmljb3JuIi4KCmBjcmVhdGVfdGV4dHVyZWAgcHJvZ3JhbW1hdGljYWxseSBjcmVhdGVzIHRleHR1cmUgbWFwcyBnaXZlbiBmaXZlIGNvbG9yczogYSBoaWdobGlnaHQsIGEgc2hhZG93LCBhIGxlZnQgZmlsbCBsaWdodCwgYSByaWdodCBmaWxsIGxpZ2h0LCBhbmQgYSBjZW50ZXIgY29sb3IgZm9yIGZsYXQgYXJlYXMuIFRoZSB1c2VyIGNhbiBhbHNvIG9wdGlvbmFsbHkgc3BlY2lmeSB0aGUgY29sb3JzIGF0IHRoZSBjb3JuZXJzLCBidXQgY3JlYXRlX3RleHR1cmUgd2lsbCBpbnRlcnBvbGF0ZSB0aG9zZSBpZiB0aGV5IGFyZW7igJl0IGdpdmVuLgoKYGFtYmllbnRfc2hhZGVgIGNyZWF0ZXMgYW4gYW1iaWVudCBvY2NsdXNpb24gc2hhZG93IGxheWVyLCBkYXJrZW5pbmcgYXJlYXMgdGhhdCBoYXZlIGxlc3Mgc2NhdHRlcmVkIGxpZ2h0IGZyb20gdGhlIGF0bW9zcGhlcmUuIFRoaXMgcmVzdWx0cyBpbiB2YWxsZXlzIGJlaW5nIGRhcmtlciB0aGFuIGZsYXQgYXJlYXMgYW5kIHJpZGdlcy4KCmBsYW1iX3NoYWRlYCB1c2VzIGEgc2luZ2xlIHVzZXIgc3BlY2lmaWVkIGxpZ2h0IGRpcmVjdGlvbiB0byBjYWxjdWxhdGUgYSBsb2NhbCBzaGFkb3cgbWFwIGJhc2VkIG9uIHRoZSBkb3QgcHJvZHVjdCBiZXR3ZWVuIHRoZSBzdXJmYWNlIG5vcm1hbCBhbmQgdGhlIGxpZ2h0IGRpcmVjdGlvbiBmb3IgYW4gZWxldmF0aW9uIG1hdHJpeC4KYWRkX3NoYWRvdyB0YWtlcyB0d28gb2YgdGhlIHNoYWRvdyBtYXBzIGFib3ZlIGFuZCBjb21iaW5lcyB0aGVtLCBzY2FsaW5nIHRoZSBzZWNvbmQgb25lIChvciwgaWYgdGhlIHNlY29uZCBpcyBhbiBSR0IgYXJyYXksIHRoZSBtYXRyaXgpIGFzIHNwZWNpZmllZCBieSB0aGUgdXNlci4KCmBhZGRfb3ZlcmxheWAgdGFrZXMgYSAzIG9yIDQtbGF5ZXIgUkdCL1JHQkEgYXJyYXkgYW5kIG92ZXJsYXlzIGl0IG9uIHRoZSBjdXJyZW50IG1hcC4gSWYgdGhlIG1hcCBpbmNsdWRlcyB0cmFuc3BhcmVuY3ksIHRoaXMgaXMgdGFrZW4gaW50byBhY2NvdW50IHdoZW4gb3ZlcmxheWluZyB0aGUgaW1hZ2UuIE90aGVyd2lzZSwgdGhlIHVzZXIgY2FuIHNwZWNpZnkgYSBzaW5nbGUgY29sb3IgdGhhdCB3aWxsIGJlIG1hcmtlZCBhcyBjb21wbGV0ZWx5IHRyYW5zcGFyZW50LCBvciBzZXQgdGhlIGZ1bGwgb3ZlcmxheSBhcyBwYXJ0bHkgdHJhbnNwYXJlbnQuCgojIyBSYXlzaGFkZXIgYWxzbyBoYXMgdGhyZWUgZnVuY3Rpb25zIHRvIGRldGVjdCBhbmQgYWRkIHdhdGVyIHRvIG1hcHM6CgpgZGV0ZWN0X3dhdGVyYCB1c2VzIGEgZmxvb2QtZmlsbCBhbGdvcml0aG0gdG8gZGV0ZWN0IGJvZGllcyBvZiB3YXRlciBvZiBhIHVzZXItc3BlY2lmaWVkIG1pbmltdW0gYXJlYS4KCmBhZGRfd2F0ZXJgIHVzZXMgdGhlIG91dHB1dCBvZiBkZXRlY3Rfd2F0ZXIgdG8gYWRkIGEgd2F0ZXIgY29sb3IgdG8gdGhlIG1hcC4gVGhlIHVzZXIgY2FuIGlucHV0IHRoZWlyIG93biBjb2xvciwgb3IgcGFzcyB0aGUgbmFtZSBvZiBvbmUgb2YgdGhlIHByZS1kZWZpbmVkIHBhbGV0dGVzIGZyb20gc3BoZXJlX3NoYWRlIHRvIGdldCBhIG1hdGNoaW5nIGh1ZS4KCmByZW5kZXJfd2F0ZXJgIGFkZHMgYSAzRCB0cmFucGFyZW50IHdhdGVyIGxheWVyIHRvIDNEIG1hcHMsIGFmdGVyIHRoZSByZ2wgZGV2aWNlIGhhcyBhbHJlYWR5IGJlZW4gY3JlYXRlZC4gVGhpcyBjYW4gZWl0aGVyIGFkZCB0byBhIG1hcCB0aGF0IGRvZXMgbm90IGFscmVhZHkgaGF2ZSBhIHdhdGVyIGxheWVyLCBvciByZXBsYWNlIGFuIGV4aXN0aW5nIHdhdGVyIGxheWVyIG9uIHRoZSBtYXAuCgoKIyMgQWxzbyBpbmNsdWRlZCBhcmUgdHdvIGZ1bmN0aW9ucyB0byBhZGQgYWRkaXRpb25hbCBlZmZlY3RzIGFuZCBpbmZvcm1hdGlvbiB0byB5b3VyIDNEIHZpc3VhbGl6YXRpb25zOgoKYHJlbmRlcl9oaWdocXVhbGl0eWAgcmVuZGVycyBpbiB0aGUgc2NlbmUgd2l0aCBhIGJ1aWx0LWluIHBhdGh0cmFjZXIsIHBvd2VyZWQgYnkgdGhlIHJheXJlbmRlciBwYWNrYWdlLiBVc2UgdGhpcyBmb3IgaGlnaC1xdWFsaXR5IG1hcHMgd2l0aCByZWFsaXN0aWMgbGlnaHQgdHJhbnNwb3J0LgoKYHJlbmRlcl9kZXB0aGAgZ2VuZXJhdGVzIGEgZGVwdGggb2YgZmllbGQgZWZmZWN0IGZvciB0aGUgM0QgbWFwLiBUaGUgdXNlciBjYW4gc3BlY2lmeSB0aGUgZm9jYWwgZGlzdGFuY2UsIGZvY2FsIGxlbmd0aCwgYW5kIGYtc3RvcCBvZiB0aGUgY2FtZXJhLCBhcyB3ZWxsIGFzIGFwZXJ0dXJlIHNoYXBlIGFuZCBib2tlaCBpbnRlbnNpdHkuIFRoaXMgZWl0aGVyIHBsb3RzIHRoZSBpbWFnZSB0byB0aGUgbG9jYWwgZGV2aWNlLCBvciBzYXZlcyBpdCB0byBhIGZpbGUgaWYgZ2l2ZW4gYSBmaWxlbmFtZS4KCmByZW5kZXJfbGFiZWxgIGFkZHMgYSB0ZXh0IGxhYmVsIHRvIHRoZSB4IGFuZCB5IGNvb3JkaW5hdGUgb2YgdGhlIG1hcCBhdCBhIHNwZWNpZmllZCBhbHRpdHVkZSB6IChpbiB1bml0cyBvZiB0aGUgbWF0cml4KS4gVGhlIGFsdGl0dWRlIGNhbiBlaXRoZXIgYmUgc3BlY2lmaWVkIHJlbGF0aXZlIHRvIHRoZSBlbGV2YXRpb24gYXQgdGhhdCBwb2ludCAodGhlIGRlZmF1bHQpLCBvciBhYnNvbHV0ZWx5LgoKCiMjIEFuZCBmb3VyIGZ1bmN0aW9ucyB0byBkaXNwbGF5IGFuZCBzYXZlIHlvdXIgdmlzdWFsaXphdGlvbnM6CgpgcGxvdF9tYXBgIFBsb3RzIHRoZSBjdXJyZW50IG1hcC4gQWNjZXB0cyBlaXRoZXIgYSBtYXRyaXggb3IgYW4gYXJyYXkuCgpgd3JpdGVfcG5nYCBXcml0ZXMgdGhlIGN1cnJlbnQgbWFwIHRvIGRpc2sgd2l0aCBhIHVzZXItc3BlY2lmaWVkIGZpbGVuYW1lLgoKYHBsb3RfM2RgIENyZWF0ZXMgYSAzRCBtYXAsIGdpdmVuIGEgdGV4dHVyZSBhbmQgYW4gZWxldmF0aW9uIG1hdHJpeC4gWW91IGNhbiBjdXN0b21pemUgdGhlIGFwcGVhcmFuY2Ugb2YgdGhlIG1hcCwgYXMgd2VsbCBhcyBhZGQgYSB1c2VyLWRlZmluZWQgd2F0ZXIgbGV2ZWwuCgpgcmVuZGVyX3NuYXBzaG90YCBTYXZlcyBhbiBpbWFnZSBvZiB0aGUgY3VycmVudCAzRCB2aWV3IHRvIGRpc2sgKGlmIGdpdmVuIGEgZmlsZW5hbWUpLCBvciBwbG90cyB0aGUgM0QgdmlldyB0byB0aGUgY3VycmVudCBkZXZpY2UgKHVzZWZ1bCBmb3IgaW5jbHVkaW5nIGltYWdlcyBpbiBSIE1hcmtkb3duIGZpbGVzKS4KcmVuZGVyX21vdmllIENyZWF0ZXMgYW5kIHNhdmVzIGEgbXA0IGZpbGUgb2YgdGhlIGNhbWVyYSByb3RhdGluZyBhcm91bmQgdGhlIDNEIHNjZW5lIGJ5IGVpdGhlciB1c2luZyBhIGJ1aWx0LWluIG9yYml0IG9yIGJ5IHVzaW5nIG9uZSBwcm92aWRlZCBieSB0aGUgdXNlci4KCiMjIFBsb3R0aW5nIG1hcCBhbmQgc3BoZXJlX3NoYWRlCgpgYGB7cn0KbGlicmFyeShyYXlzaGFkZXIpCgojSGVyZSwgSSBsb2FkIGEgbWFwIHdpdGggdGhlIHJhc3RlciBwYWNrYWdlLgpsb2FkemlwID0gdGVtcGZpbGUoKQpkb3dubG9hZC5maWxlKCJodHRwczovL3R5bGVybXcuY29tL2RhdGEvZGVtXzAxLnRpZi56aXAiLCBsb2FkemlwKQpsb2NhbHRpZiA9IHJhc3Rlcjo6cmFzdGVyKHVuemlwKGxvYWR6aXAsICJkZW1fMDEudGlmIikpCnVubGluayhsb2FkemlwKQoKI0FuZCBjb252ZXJ0IGl0IHRvIGEgbWF0cml4OgplbG1hdCA9IHJhc3Rlcl90b19tYXRyaXgobG9jYWx0aWYpCgojV2UgdXNlIGFub3RoZXIgb25lIG9mIHJheXNoYWRlcidzIGJ1aWx0LWluIHRleHR1cmVzOgplbG1hdCAlPiUKICBzcGhlcmVfc2hhZGUodGV4dHVyZSA9ICJkZXNlcnQiKSAlPiUKICBwbG90X21hcCgpCmBgYAoKYGBge3J9CiNzcGhlcmVfc2hhZGUgY2FuIHNoaWZ0IHRoZSBzdW4gZGlyZWN0aW9uOgplbG1hdCAlPiUKICBzcGhlcmVfc2hhZGUoc3VuYW5nbGUgPSA0NSwgdGV4dHVyZSA9ICJkZXNlcnQiKSAlPiUKICBwbG90X21hcCgpCmBgYAoKIyMgRGV0ZWN0aW5nIGFuZCBBZGRpbmcgV2F0ZXIKCmBgYHtyfQojZGV0ZWN0X3dhdGVyIGFuZCBhZGRfd2F0ZXIgYWRkcyBhIHdhdGVyIGxheWVyIHRvIHRoZSBtYXA6CmVsbWF0ICU+JQogIHNwaGVyZV9zaGFkZSh0ZXh0dXJlID0gImRlc2VydCIpICU+JQogIGFkZF93YXRlcihkZXRlY3Rfd2F0ZXIoZWxtYXQpLCBjb2xvciA9ICJkZXNlcnQiKSAlPiUKICBwbG90X21hcCgpCmBgYAoKIyMgQWRkaW5nIFNoYWRvdwoKYGBge3J9CiNBbmQgd2UgY2FuIGFkZCBhIHJheXRyYWNlZCBsYXllciBmcm9tIHRoYXQgc3VuIGRpcmVjdGlvbiBhcyB3ZWxsOgplbG1hdCAlPiUKICBzcGhlcmVfc2hhZGUodGV4dHVyZSA9ICJkZXNlcnQiKSAlPiUKICBhZGRfd2F0ZXIoZGV0ZWN0X3dhdGVyKGVsbWF0KSwgY29sb3IgPSAiZGVzZXJ0IikgJT4lCiAgYWRkX3NoYWRvdyhyYXlfc2hhZGUoZWxtYXQpLCAwLjUpICU+JQogIHBsb3RfbWFwKCkKYGBgCgojIyBBZGRpbmcgQW1iaWVudCBPY2NsdXNpb24gU2hhZG93IExheWVyCgpgYGB7cn0KI0FuZCBoZXJlIHdlIGFkZCBhbiBhbWJpZW50IG9jY2x1c2lvbiBzaGFkb3cgbGF5ZXIsIHdoaWNoIG1vZGVscyAKI2xpZ2h0aW5nIGZyb20gYXRtb3NwaGVyaWMgc2NhdHRlcmluZzoKCmVsbWF0ICU+JQogIHNwaGVyZV9zaGFkZSh0ZXh0dXJlID0gImRlc2VydCIpICU+JQogIGFkZF93YXRlcihkZXRlY3Rfd2F0ZXIoZWxtYXQpLCBjb2xvciA9ICJkZXNlcnQiKSAlPiUKICBhZGRfc2hhZG93KHJheV9zaGFkZShlbG1hdCksIDAuNSkgJT4lCiAgYWRkX3NoYWRvdyhhbWJpZW50X3NoYWRlKGVsbWF0KSwgMCkgJT4lCiAgcGxvdF9tYXAoKQpgYGAKCiMjIFBsb3R0aW5nIGluIDNECgpgYGB7cn0KZWxtYXQgJT4lCiAgc3BoZXJlX3NoYWRlKHRleHR1cmUgPSAiZGVzZXJ0IikgJT4lCiAgYWRkX3dhdGVyKGRldGVjdF93YXRlcihlbG1hdCksIGNvbG9yID0gImRlc2VydCIpICU+JQogIGFkZF9zaGFkb3cocmF5X3NoYWRlKGVsbWF0LCB6c2NhbGUgPSAzKSwgMC41KSAlPiUKICBhZGRfc2hhZG93KGFtYmllbnRfc2hhZGUoZWxtYXQpLCAwKSAlPiUKICBwbG90XzNkKGVsbWF0LCB6c2NhbGUgPSAxMCwgZm92ID0gMCwgdGhldGEgPSAxMzUsIHpvb20gPSAwLjc1LCBwaGkgPSA0NSwgd2luZG93c2l6ZSA9IGMoMTAwMCwgODAwKSkKU3lzLnNsZWVwKDAuMikKcmVuZGVyX3NuYXBzaG90KCkKYGBgCgojIyBBZGRpbmcgU2NhbGUKCmBgYHtyfQpyZW5kZXJfY2FtZXJhKGZvdiA9IDAsIHRoZXRhID0gNjAsIHpvb20gPSAwLjc1LCBwaGkgPSA0NSkKcmVuZGVyX3NjYWxlYmFyKGxpbWl0cz1jKDAsIDUsIDEwKSxsYWJlbF91bml0ID0gImttIixwb3NpdGlvbiA9ICJXIiwgeT01MCwKICAgICAgICAgICAgICAgIHNjYWxlX2xlbmd0aCA9IGMoMC4zMywxKSkKcmVuZGVyX2NvbXBhc3MocG9zaXRpb24gPSAiRSIpCnJlbmRlcl9zbmFwc2hvdChjbGVhcj1UUlVFKQpgYGAKCiMgVGhlIHByb2JsZW0gc2V0OiAKCkJlbG93IGlzIG91ciBwcm9ibGVtIHNldCBhYm91dCB0aGUgSG9uZyBLb25nIGhvdXNpbmcgcHJpY2UuIFdlIGhhdmUgZ2l2ZW4gdGhlIGRhdGFzZXRzLCB0aGUgMmQgUGxvdHMgYW5kIGFsc28gc29tZSBpbmZvcm1hdGlvbiBiZWxvdy4gCgpgYGB7cn0KbGlicmFyeShyZWFkeGwpCmxpYnJhcnkoc3ApCmxpYnJhcnkoZ2dwbG90MikKbGlicmFyeShwbmcpCmxpYnJhcnkoZ3JpZCkKbGlicmFyeShyYXlzaGFkZXIpCmxpYnJhcnkocmdsKQpgYGAKCmBgYHtyfQojIyBIZXJlIGlzIHRoZSAzIGRhdGFzZXRzCmRpc3RyaWN0X25hbWUgPSByZWFkX2V4Y2VsKCdEaXN0cmljdCBOYW1lLnhsc3gnLDEpCnBvcHVsYXRpb24gPSByZWFkX2V4Y2VsKCdQb3B1bGF0aW9uIERhdGEueGxzeCcsMSkKY29sbmFtZXMocG9wdWxhdGlvbikgPSBjKCJDaGlfbmFtZSIsICJQb3B1bGF0aW9uIikKCmhrbWFwID0gcmVhZFJEUygiSEtHX2FkbTEucmRzIikKYGBgCgpgYGB7cn0KIyBUaGUgW3JlcHJvY2Vzc2luZyBwYXJ0Cm1hcF9kYXRhID0gZGF0YS5mcmFtZShpZD1oa21hcCRJRF8xLCBDb2RlPWhrbWFwJEhBU0NfMSwgRW5nX25hbWU9aGttYXAkTkFNRV8xKQptYXBfZGF0YSRDb2RlID0gZ3N1YignSEsuJywgJycsIGFzLmNoYXJhY3RlcihtYXBfZGF0YSRDb2RlKSkKbWFwX2RhdGEgPSBtZXJnZShtYXBfZGF0YSwgZGlzdHJpY3RfbmFtZSwgYnkgPSAnRW5nX25hbWUnKQpoa21hcGRmID0gZm9ydGlmeShoa21hcCkKbWFwX2RhdGEgPSBtZXJnZShoa21hcGRmLCBtYXBfZGF0YSwgYnk9ImlkIikKbWFwX2RhdGEgPSBtZXJnZShtYXBfZGF0YSwgcG9wdWxhdGlvbiwgYnkgPSAiQ2hpX25hbWUiKQptYXBfZGF0YSRQb3B1bGF0aW9uID0gYXMubnVtZXJpYyhtYXBfZGF0YSRQb3B1bGF0aW9uKQpgYGAKCgpgYGB7cn0KIyBIZXJlIGlzIHRoZSBjb2RlIHRvIGNyZWF0ZSBhIDJEIG1hcCBpbiBIb25na29uZy4KIyBNYXAKbWFwX2JnID0gZ2dwbG90KG1hcF9kYXRhLCBhZXMobG9uZywgbGF0LCBncm91cD1ncm91cCwgZmlsbCA9IFBvcHVsYXRpb24pKSArCiAgZ2VvbV9wb2x5Z29uKCkgKyAjIFNoYXBlCiAgc2NhbGVfZmlsbF9ncmFkaWVudChsaW1pdHM9cmFuZ2UobWFwX2RhdGEkUG9wdWxhdGlvbiksIAogICAgICAgICAgICAgICAgICAgICAgbG93PSIjRkZGM0IwIiwgaGlnaD0iI0UwOUYzRSIpICsgIyBQb3B1bGF0aW9uIERlbnNpdHkgQ29sb3IKICBsYXllcihnZW9tPSJwYXRoIiwgc3RhdD0iaWRlbnRpdHkiLCBwb3NpdGlvbj0iaWRlbnRpdHkiLCAKICAgICAgIG1hcHBpbmc9YWVzKHg9bG9uZywgeT1sYXQsIGdyb3VwPWdyb3VwLCAKICAgICAgICAgICAgICAgICAgIGNvbG9yPUkoJyNGRkZGRkYnKSkpICMgQm9hcmRlciBDb2xvcgogIAptYXBfYmcgPSBtYXBfYmcgKyB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAibm9uZSIsIAogICAgICAgICAgICAgICAgICAgICAgICBheGlzLmxpbmU9ZWxlbWVudF9ibGFuaygpLCAKICAgICAgICAgICAgICAgICAgICAgICAgYXhpcy50ZXh0Lng9ZWxlbWVudF9ibGFuaygpLCBheGlzLnRpdGxlLng9ZWxlbWVudF9ibGFuaygpLAogICAgICAgICAgICAgICAgICAgICAgICBheGlzLnRleHQueT1lbGVtZW50X2JsYW5rKCksIGF4aXMudGl0bGUueT1lbGVtZW50X2JsYW5rKCksCiAgICAgICAgICAgICAgICAgICAgICAgIGF4aXMudGlja3M9ZWxlbWVudF9ibGFuaygpLCAKICAgICAgICAgICAgICAgICAgICAgICAgcGFuZWwuYmFja2dyb3VuZCA9IGVsZW1lbnRfYmxhbmsoKSkgIyBDbGVhbiBFdmVyeXRoaW5nCm1hcF9iZwpgYGAKCmBgYHtyfQojIFNhdmUgYXMgUE5HCnhsaW0gPSBnZ3Bsb3RfYnVpbGQobWFwX2JnKSRsYXlvdXQkcGFuZWxfc2NhbGVzX3hbWzFdXSRyYW5nZSRyYW5nZQp5bGltID0gZ2dwbG90X2J1aWxkKG1hcF9iZykkbGF5b3V0JHBhbmVsX3NjYWxlc195W1sxXV0kcmFuZ2UkcmFuZ2UKZ2dzYXZlKCdtYXBfYmcucG5nJywgd2lkdGggPSBkaWZmKHhsaW0pKjQwLCBoZWlnaHQgPSBkaWZmKHlsaW0pKjQwLCB1bml0cyA9ICJjbSIpCmBgYAoKYGBge3J9CiMgUmVhbCBFc3RhdGUgRGF0YXNldAplc3RhdGVfZGYgPSByZWFkcjo6cmVhZF9jc3YoJ2h0dHBzOi8vcmF3LmdpdGh1YnVzZXJjb250ZW50LmNvbS9jeWRhbHl0aWNzL0hLX1Byb3BlcnRpZXNfUHJpY2VfRGlzdHJpYnV0aW9uL21hc3Rlci9yZWFsX2VzdGF0ZV9tYXN0ZXJfZGYuY3N2JykKZXN0YXRlX2RmJGFwcl9wcmljZSA9IGFzLm51bWVyaWMoZ3N1YignW14wLTldJywgJycsIGVzdGF0ZV9kZiRQcmljZV9QZXJfU3FGZWV0X0FwcjIwMjApKQplc3RhdGVfZGYkbWFyX3ByaWNlID0gYXMubnVtZXJpYyhnc3ViKCdbXjAtOV0nLCAnJywgZXN0YXRlX2RmJFByaWNlX1Blcl9TcUZlZXRfTWFyMjAyMCkpCmBgYAoKYGBge3J9CiMgUmVhZCBCYWNrZ3JvdW5kIEltYWdlCmhrX21hcF9iZyA9IHJlYWRQTkcoJ21hcF9iZy5wbmcnKQpgYGAKCkhlcmUgaXMgdGhlIDJEIG1hcCB0aGF0IHdlIG5lZWQgdG8gdHVybiBpbnRvIDNELiAKCmBgYHtyfQojIDJEIFBsb3QKbGlicmFyeShnZ3Bsb3QyKQpsaWJyYXJ5KGdyaWQpCmVzdGF0ZV9wcmljZSA9IGdncGxvdChlc3RhdGVfZGYpICsgCiAgYW5ub3RhdGlvbl9jdXN0b20ocmFzdGVyR3JvYihoa19tYXBfYmcsIHdpZHRoPXVuaXQoMSwibnBjIiksIGhlaWdodD11bml0KDEsIm5wYyIpKSwgCiAgICAgICAgICAgICAgICAgICAgLUluZiwgSW5mLCAtSW5mLCBJbmYpICsgIyBCYWNrZ3JvdW5kCiAgeGxpbSh4bGltWzFdLHhsaW1bMl0pICsgIyB4LWF4aXMgTWFwcGluZwogIHlsaW0oeWxpbVsxXSx5bGltWzJdKSArICMgeS1heGlzIE1hcHBpbmcKICBnZW9tX3BvaW50KGFlcyh4PUxvbmdpdHVkZSwgeT1MYXRpdHVkZSwgY29sb3I9YXByX3ByaWNlKSwgc2l6ZT0yKSArICMgUG9pbnRzCiAgc2NhbGVfY29sb3VyX2dyYWRpZW50KG5hbWUgPSAnUHJpY2UgcGVyIHNxdWFyZSBmb290IChyZWFsKVxuKEhLRCknLCAKICAgICAgICAgICAgICAgICAgICAgICAgbGltaXRzPXJhbmdlKGVzdGF0ZV9kZiRhcHJfcHJpY2UpLCAKICAgICAgICAgICAgICAgICAgICAgICAgbG93PSIjRkNCOUIyIiwgaGlnaD0iI0IyM0E0OCIpICsgIyBQcmljZSBEZW5zaXR5IENvbG9yCiAgdGhlbWUoYXhpcy5saW5lPWVsZW1lbnRfYmxhbmsoKSwgCiAgICAgICAgYXhpcy50ZXh0Lng9ZWxlbWVudF9ibGFuaygpLCBheGlzLnRpdGxlLng9ZWxlbWVudF9ibGFuaygpLAogICAgICAgIGF4aXMudGV4dC55PWVsZW1lbnRfYmxhbmsoKSwgYXhpcy50aXRsZS55PWVsZW1lbnRfYmxhbmsoKSwKICAgICAgICBheGlzLnRpY2tzPWVsZW1lbnRfYmxhbmsoKSwgCiAgICAgICAgcGFuZWwuYmFja2dyb3VuZCA9IGVsZW1lbnRfYmxhbmsoKSkgIyBDbGVhbiBFdmVyeXRoaW5nCmVzdGF0ZV9wcmljZQpnZ3NhdmUoJ2VzdGF0ZV9wcmljZS5wbmcnLCB3aWR0aCA9IGRpZmYoeGxpbSkqNDAsIGhlaWdodCA9IGRpZmYoeWxpbSkqNDAsIHVuaXRzID0gImNtIikKYGBgCgpBZnRlciBzZWVpbmcgdGhlIGdyYXBoLCB0aGUgdHdvIHF1ZXN0aW9ucyBmb3IgeW91IHRvIGV4cGxvcmUgd2lsbCBiZTogCgoxKSBIb3cgaXMgdGhlIHBvcHVsYXRpb24gZGlzdHJpYnV0aW9uIGluIEhvbmcgS29uZz8gSXMgdGhlIGVzdGF0ZSBwcmljZSBoaWdoZXIgaW4gZGVuc2VseSBwb3B1bGF0ZWQgZGlzdHJpY3Q/CgoyKSBIb3cgdG8gdHJhbnNmZXIgYSAyRCBwbG90IHRvIGEgM0QgcGxvdD8gRG8geW91IHRoaW5rIGNyZWF0aW5nIGEgM0QgcGxvdCB3aWxsIGJlIGEgZ29vZCBpZGVhIGluIGhlcmU/IFdoeSBpcyB0aGF0PyAKCgoKCgoKCgoKCgoKCgoKCgo=